home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Internet / WWW / apache_1.0.5 / src / mod_log_referer.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-02-16  |  7.1 KB  |  226 lines
  1.  
  2. /* ====================================================================
  3.  * Copyright (c) 1995 The Apache Group.  All rights reserved.
  4.  *
  5.  * Redistribution and use in source and binary forms, with or without
  6.  * modification, are permitted provided that the following conditions
  7.  * are met:
  8.  *
  9.  * 1. Redistributions of source code must retain the above copyright
  10.  *    notice, this list of conditions and the following disclaimer. 
  11.  *
  12.  * 2. Redistributions in binary form must reproduce the above copyright
  13.  *    notice, this list of conditions and the following disclaimer in
  14.  *    the documentation and/or other materials provided with the
  15.  *    distribution.
  16.  *
  17.  * 3. All advertising materials mentioning features or use of this
  18.  *    software must display the following acknowledgment:
  19.  *    "This product includes software developed by the Apache Group
  20.  *    for use in the Apache HTTP server project (http://www.apache.org/)."
  21.  *
  22.  * 4. The names "Apache Server" and "Apache Group" must not be used to
  23.  *    endorse or promote products derived from this software without
  24.  *    prior written permission.
  25.  *
  26.  * 5. Redistributions of any form whatsoever must retain the following
  27.  *    acknowledgment:
  28.  *    "This product includes software developed by the Apache Group
  29.  *    for use in the Apache HTTP server project (http://www.apache.org/)."
  30.  *
  31.  * THIS SOFTWARE IS PROVIDED BY THE APACHE GROUP ``AS IS'' AND ANY
  32.  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  33.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  34.  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE APACHE GROUP OR
  35.  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  36.  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  37.  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  38.  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  39.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  40.  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  41.  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  42.  * OF THE POSSIBILITY OF SUCH DAMAGE.
  43.  * ====================================================================
  44.  *
  45.  * This software consists of voluntary contributions made by many
  46.  * individuals on behalf of the Apache Group and was originally based
  47.  * on public domain software written at the National Center for
  48.  * Supercomputing Applications, University of Illinois, Urbana-Champaign.
  49.  * For more information on the Apache Group and the Apache HTTP server
  50.  * project, please see <http://www.apache.org/>.
  51.  *
  52.  */
  53.  
  54.  
  55.  
  56. #include "httpd.h"
  57. #include "http_config.h"
  58.  
  59. module referer_log_module;
  60.  
  61. static int xfer_flags = ( O_WRONLY | O_APPEND | O_CREAT );
  62. static mode_t xfer_mode = ( S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH );
  63.  
  64. typedef struct {
  65.     char *fname;
  66.     int referer_fd;
  67.     array_header *referer_ignore_list;
  68. } referer_log_state;
  69.  
  70. void *make_referer_log_state (pool *p, server_rec *s)
  71. {
  72.     referer_log_state *cls =
  73.       (referer_log_state *)palloc (p, sizeof (referer_log_state));
  74.  
  75.     cls->fname = "";
  76.     cls->referer_fd = -1;
  77.     cls->referer_ignore_list = make_array(p, 1, sizeof(char *));
  78.     return (void *)cls;
  79. }
  80.  
  81. char *set_referer_log (cmd_parms *parms, void *dummy, char *arg)
  82. {
  83.     referer_log_state *cls = get_module_config (parms->server->module_config,
  84.                            &referer_log_module);
  85.   
  86.     cls->fname = arg;
  87.     return NULL;
  88. }
  89.  
  90. char *add_referer_ignore (cmd_parms *parms, void *dummy, char *arg)
  91. {
  92.   char **addme;
  93.   referer_log_state *cls = get_module_config (parms->server->module_config,
  94.                           &referer_log_module);
  95.  
  96.   addme = push_array(cls->referer_ignore_list);
  97.   *addme = pstrdup(cls->referer_ignore_list->pool, arg);
  98.   return NULL;
  99. }
  100.  
  101. command_rec referer_log_cmds[] = {
  102. { "RefererLog", set_referer_log, NULL, RSRC_CONF, TAKE1,
  103.     "the filename of the referer log" },
  104. { "RefererIgnore", add_referer_ignore, NULL, RSRC_CONF, ITERATE,
  105.     "referer hostnames to ignore" },
  106. { NULL }
  107. };
  108.  
  109. void referer_log_child (void *cmd)
  110. {
  111.     /* Child process code for 'RefererLog "|..."';
  112.      * may want a common framework for this, since I expect it will
  113.      * be common for other foo-loggers to want this sort of thing...
  114.      */
  115.     
  116.     cleanup_for_exec();
  117.     signal (SIGHUP, SIG_IGN);
  118.     execl (SHELL_PATH, SHELL_PATH, "-c", (char *)cmd, NULL);
  119.     fprintf (stderr, "Exec of shell for logging failed!!!\n");
  120.     exit (1);
  121. }
  122.  
  123. void open_referer_log (server_rec *s, pool *p)
  124. {
  125.     referer_log_state *cls = get_module_config (s->module_config,
  126.                            &referer_log_module);
  127.   
  128.     char *fname = server_root_relative (p, cls->fname);
  129.     
  130.     if (cls->referer_fd > 0) return; /* virtual log shared w/main server */
  131.     
  132.     if (*cls->fname == '|') {
  133.     FILE *dummy;
  134.     
  135.     spawn_child(p, referer_log_child, (void *)(cls->fname+1),
  136.             kill_after_timeout, &dummy, NULL);
  137.  
  138.     if (dummy == NULL) {
  139.         fprintf (stderr, "Couldn't fork child for RefererLog process\n");
  140.         exit (1);
  141.     }
  142.  
  143.     cls->referer_fd = fileno (dummy);
  144.     }
  145.     else if(*cls->fname != '\0') {
  146.       if((cls->referer_fd = popenf(p, fname, xfer_flags, xfer_mode)) < 0) {
  147.         fprintf(stderr,"httpd: could not open referer log file %s.\n", fname);
  148.         perror("open");
  149.         exit(1);
  150.       }
  151.     }
  152. }
  153.  
  154. void init_referer_log (server_rec *s, pool *p)
  155. {
  156.     for (; s; s = s->next) open_referer_log (s, p);
  157. }
  158.  
  159. int referer_log_transaction(request_rec *orig)
  160. {
  161.     char **ptrptr, **ptrptr2;
  162.     referer_log_state *cls = get_module_config (orig->server->module_config,
  163.                            &referer_log_module);
  164.   
  165.     char *str;
  166.     char *referer;
  167.     request_rec *r;
  168.  
  169.     if(cls->referer_fd <0)
  170.       return OK;
  171.  
  172.     for (r = orig; r->next; r = r->next)
  173.         continue;
  174.     if (*cls->fname == '\0')    /* Don't log referer */
  175.     return DECLINED;
  176.     
  177.     referer = table_get(orig->headers_in, "Referer");
  178.     if(referer != NULL)
  179.       {
  180.  
  181.  
  182.       /* The following is an upsetting mess of pointers, I'm sorry
  183.          Anyone with the motiviation and/or the time should feel free
  184.          to make this cleaner... */
  185.  
  186.       ptrptr2 = (char **) (cls->referer_ignore_list->elts + 
  187.              (cls->referer_ignore_list->nelts *
  188.               cls->referer_ignore_list->elt_size));
  189.       
  190.       /* Go through each element of the ignore list and compare it to the
  191.          referer_host.  If we get a match, return without logging */
  192.  
  193.       for(ptrptr = (char **) cls->referer_ignore_list->elts;
  194.           ptrptr < ptrptr2;
  195.           ptrptr += cls->referer_ignore_list->elt_size) 
  196.         {
  197.         if(strstr(referer, *ptrptr))
  198.           return OK;
  199.         }
  200.       
  201.       
  202.       str = pstrcat(orig->pool, referer, " -> ", r->uri, "\n", NULL);
  203.       write(cls->referer_fd, str, strlen(str));
  204.       }
  205.  
  206.     return OK;
  207. }
  208.  
  209. module referer_log_module = {
  210.    STANDARD_MODULE_STUFF,
  211.    init_referer_log,        /* initializer */
  212.    NULL,            /* create per-dir config */
  213.    NULL,            /* merge per-dir config */
  214.    make_referer_log_state,    /* server config */
  215.    NULL,            /* merge server config */
  216.    referer_log_cmds,        /* command table */
  217.    NULL,            /* handlers */
  218.    NULL,            /* filename translation */
  219.    NULL,            /* check_user_id */
  220.    NULL,            /* check auth */
  221.    NULL,            /* check access */
  222.    NULL,            /* type_checker */
  223.    NULL,            /* fixups */
  224.    referer_log_transaction    /* logger */
  225. };
  226.